home *** CD-ROM | disk | FTP | other *** search
/ Columbia Kermit / kermit.zip / newsgroups / misc.19971216-19980424 / 000329_news@newsmaster….columbia.edu _Mon Mar 23 17:53:17 1998.msg < prev    next >
Internet Message Format  |  2020-01-01  |  4KB
  1. Return-Path: <news@newsmaster.cc.columbia.edu>
  2. Received: from newsmaster.cc.columbia.edu (newsmaster.cc.columbia.edu [128.59.35.30])
  3.     by watsun.cc.columbia.edu (8.8.5/8.8.5) with ESMTP id RAA27815
  4.     for <kermit.misc@watsun.cc.columbia.edu>; Mon, 23 Mar 1998 17:53:17 -0500 (EST)
  5. Received: (from news@localhost)
  6.     by newsmaster.cc.columbia.edu (8.8.5/8.8.5) id RAA28167
  7.     for kermit.misc@watsun; Mon, 23 Mar 1998 17:53:16 -0500 (EST)
  8. Path: news.columbia.edu!watsun.cc.columbia.edu!fdc
  9. From: fdc@watsun.cc.columbia.edu (Frank da Cruz)
  10. Newsgroups: comp.protocols.kermit.misc
  11. Subject: Re: Help with simple script...
  12. Date: 23 Mar 1998 22:53:15 GMT
  13. Organization: Columbia University
  14. Lines: 78
  15. Message-ID: <6f6p4r$g7o$1@apakabar.cc.columbia.edu>
  16. References: <6f6ncm$oku@panix3.panix.com>
  17. NNTP-Posting-Host: watsun.cc.columbia.edu
  18. Xref: news.columbia.edu comp.protocols.kermit.misc:8527
  19.  
  20. In article <6f6ncm$oku@panix3.panix.com>,
  21. Greg Vilardi <vilardi@panix.com> wrote:
  22. : Hi everyone. I am having a problem writing a simple kermit script to take a
  23. : flatfile of command records and spit them out to a remote serial device. The
  24. : technical details are as follows: C-Kermit v6.0.192 SCO Unix 3.2v4.2
  25. : connected to a CX DigiBoard. The remote system is on a dedicated line,
  26. : directly connected and standard RS232 connectivity is working fine.
  27. : 
  28. Using what kind of flow control?
  29.  
  30. : I need to have a script that will take each line of a file, and send it out
  31. : the serial port. The script will then wait for a response from the port, and
  32. : log both the command and the response to another file. If some kind person
  33. : out there already has a script that does this or something very similar,
  34. : could you please e-mail it to me? Or could someone who knows more about
  35. : scripting than I do please tell me what is wrong with the script below? I've
  36. : spent most of the weekend with the kermit manuals and have had no luck. I
  37. : tried the FAQ too.  Suggestions to RTFM greatfully accepted if page numbers
  38. : are provided. I have read chapters 17, 18 & 19 3 times already.
  39. : ...
  40. : Script starts below:
  41. : 
  42. : ; Read file $1 one line at a time and send command to paging terminal on port
  43. : ; $3. Write return messages to $2.
  44. : 
  45. : def UPDATE {
  46. :     local \%c cmd
  47. :     if < \v(argc) 4 end 1 Usage: UPDATE infile outfile device
  48. :     ;set take error off
  49. :     set carrier-watch off
  50. :     OPEN READ \%1
  51. :     if fail end 1 Can't open \%1 for reading.
  52. :     open write \%2
  53. :     if fail end 1 Can't open \%2 for writing.
  54. :     set line \%3
  55. :     if fail end 1 Cant open port \%3
  56. :     set speed 9600
  57. :
  58. C-Kermit defaults to Xon/Xoff flow control.  Is that what you want to
  59. use?  If so, is the other system set up for it too?
  60.  
  61. :     set input silence 2
  62. :     set input timeout-action proceed
  63. :     set input echo off
  64. :     define \%c 0
  65. :     while true {
  66. :         read cmd
  67. :         xif fail {
  68. :             close write 
  69. :             end 0 Commands processed: \%c.
  70. :         }
  71. :         increment \%c
  72. : ;        writeln debug-log \m(cmd) \m(\%c)
  73. :         output \m(cmd) \13\10
  74. :         input 10 \10
  75. :         xif fail {
  76. :             close read
  77. :             close write
  78. :             end 1 Terminal did not respond.
  79. :         }
  80. :         writeln file \m(cmd)
  81. :         writeln file \v(input)
  82. :     }
  83. : }
  84. : log debug debug.log
  85. : update termrecs termrecs.out /dev/ttya01
  86. : close debug
  87.  
  88. That's a very well-written script, using all the appropriate mechanisms
  89. and using them correctly; nothing stands out as suspect.
  90.  
  91. So in what way does it not work?  What, exactly are the symptoms?
  92. Do any lines get through?  Do you ever get a LF back from the terminal?
  93.  
  94. In other words, is it a basic connectivity problem, or a problem with
  95. the execution of the script?
  96.  
  97. - Frank